inherited FPesquisaFornecedor: TFPesquisaFornecedor
  Left = 404
  Top = 273
  Caption = 'Pesquisa Fornecedor'
  ClientHeight = 378
  ClientWidth = 432
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel
    Width = 432
    inherited BtnLimpar: TBitBtn
      OnClick = BtnLimparClick
    end
    inherited BtnImprimir: TBitBtn
      OnClick = BtnImprimirClick
    end
    inherited BtnSelecionar: TBitBtn
      OnClick = BtnSelecionarClick
    end
  end
  inherited Panel1: TPanel
    Width = 432
    Height = 337
    object Label9: TLabel [0]
      Left = 6
      Top = 42
      Width = 20
      Height = 13
      Caption = 'CPF'
    end
    object Label1: TLabel [1]
      Left = 5
      Top = 87
      Width = 109
      Height = 13
      Caption = 'Nome ou Raz'#227'o Social'
    end
    object Label2: TLabel [2]
      Left = 5
      Top = 123
      Width = 40
      Height = 13
      Caption = 'Fantasia'
    end
    object Label3: TLabel [3]
      Left = 5
      Top = 2
      Width = 33
      Height = 13
      Caption = 'C'#243'digo'
    end
    object Label19: TLabel [4]
      Left = 128
      Top = 40
      Width = 29
      Height = 13
      Caption = 'Grupo'
    end
    inherited DBGrid1: TDBGrid
      Top = 211
      Width = 430
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 6
      Columns = <
        item
          Expanded = False
          FieldName = 'FORN_CODIGO'
          Title.Caption = 'Codigo'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_RAZAO'
          Title.Caption = 'Nome ou Raz'#227'o Social'
          Width = 128
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_CPFCNPJ'
          Title.Caption = 'CPF / CNPJ'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_FANTASIA'
          Title.Caption = 'Fantasia'
          Width = 75
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_INSCESTADUAL'
          Title.Caption = 'Insc Estadual'
          Width = 84
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_INSCMUNICIPAL'
          Title.Caption = 'Insc Municipal'
          Width = 74
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PLANOCONT_CODIGOCONTABIL'
          Title.Caption = 'C'#243'digo Cont'#225'bil'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PLANOCONT_DESCRICAO'
          Title.Caption = 'Conta Cont'#225'bil'
          Width = 76
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_ENDERECO'
          Title.Caption = 'Endere'#231'o'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_BAIRRO'
          Title.Caption = 'Bairro'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_CEP'
          Title.Caption = 'CEP'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_CIDADE'
          Title.Caption = 'Cidade'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_ESTADO'
          Title.Caption = 'UF'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_FONE'
          Title.Caption = 'Fone 1'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_FAX'
          Title.Caption = 'Fone 2'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'FORN_EMAIL'
          Title.Caption = 'Email'
          Visible = True
        end>
    end
    inherited Panel3: TPanel
      Top = 316
      Width = 430
      TabOrder = 7
    end
    object RGTipoFornecedor: TRadioGroup
      Left = 117
      Top = 5
      Width = 308
      Height = 32
      Caption = 'Tipo Cliente'
      Columns = 4
      Ctl3D = False
      ItemIndex = 0
      Items.Strings = (
        'Todos'
        'F'#237'sica'
        'Jur'#237'dica'
        'Outros')
      ParentCtl3D = False
      TabOrder = 1
      OnClick = RGTipoFornecedorClick
    end
    object MECpfCNPJ: TMaskEdit
      Left = 6
      Top = 55
      Width = 112
      Height = 19
      Ctl3D = False
      EditMask = '999.999.999-99;0;_'
      MaxLength = 14
      ParentCtl3D = False
      TabOrder = 2
    end
    object ENome: TEdit
      Left = 5
      Top = 100
      Width = 420
      Height = 19
      CharCase = ecUpperCase
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 4
    end
    object EFantasia: TEdit
      Left = 5
      Top = 137
      Width = 420
      Height = 19
      CharCase = ecUpperCase
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 5
    end
    object ECodigo: TEdit
      Left = 5
      Top = 15
      Width = 110
      Height = 19
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 0
      OnKeyPress = ECodigoKeyPress
    end
    object rgContaContabil: TRadioGroup
      Left = 6
      Top = 160
      Width = 419
      Height = 40
      Caption = '  Conta Contabil  '
      Columns = 3
      Ctl3D = False
      ItemIndex = 0
      Items.Strings = (
        'Todos'
        'Com Conta Contabil'
        'Sem Conta Contabil')
      ParentCtl3D = False
      TabOrder = 8
    end
    object dblGrupos: TDBLookupComboBox
      Left = 127
      Top = 55
      Width = 298
      Height = 19
      Ctl3D = False
      KeyField = 'GRUP_CODIGO'
      ListField = 'GRUP_DESCRICAO'
      ListSource = dsGrupos
      ParentCtl3D = False
      TabOrder = 3
      OnKeyDown = dblGruposKeyDown
    end
  end
  inherited QPesquisa: TQuery
    SQL.Strings = (
      
        'Select Fornecedor.*,PLANOCONT_CODIGOCONTABIL , PLANOCONT_DESCRIC' +
        'AO'
      
        'from Fornecedor left join planoContabilidade on FORN_CONTACONTAB' +
        'IL = PLANOCONT_CODIGO')
    Top = 209
  end
  inherited DSPesquisa: TDataSource
    Top = 209
  end
  object dsGrupos: TDataSource
    Left = 256
    Top = 96
  end
end
